home *** CD-ROM | disk | FTP | other *** search
/ CDUTIL 13 / CDUTIL #13 Julio 1995.iso / windows / amipro3 / macros.cmz / PRNBATCH.SMM < prev    next >
Encoding:
INI File  |  1992-11-18  |  33.2 KB  |  2,238 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     _macro.sty
  5. [files]
  6. [charset]
  7.     82
  8.     ANSI (Windows, IBM CP 1252)
  9. [revisions]
  10.     0
  11. [prn]
  12.     PostScript Printer
  13. [port]
  14.     LPT1:
  15. [lang]
  16.     1
  17. [desc]
  18.     Seleccione varios archivos para imprimirlos.
  19.     Lotus WPD Technical Support
  20.     Advanced
  21.     Call Backs, Global Arrays
  22.     noautorun
  23.     719600618
  24.     66
  25.     677020248
  26.     3510
  27.     10
  28.     1245
  29.     9186
  30.     27
  31.     27
  32.     Call Backs, Runlater, Global Aray
  33.     
  34.     
  35.     
  36.     
  37.     
  38.     0
  39. [fopts]
  40.     0
  41.     1
  42.     0
  43.     0
  44. [lnopts]
  45.     2
  46.     Body Text
  47.     1
  48. [docopts]
  49.     5
  50.     2
  51. [GramStyle]
  52.     
  53. [ParaNum]
  54.     1
  55. [tag]
  56.     Body Text
  57.     2
  58.     [fnt]
  59.         Arial
  60.         240
  61.         0
  62.         16384
  63.     [algn]
  64.         1
  65.         1
  66.         216
  67.         0
  68.         0
  69.     [spc]
  70.         33
  71.         273
  72.         1
  73.         0
  74.         0
  75.         1
  76.         100
  77.     [brk]
  78.         4
  79.     [line]
  80.         8
  81.         0
  82.         1
  83.         0
  84.         1
  85.         1
  86.         1
  87.         10
  88.         10
  89.         1
  90.     [spec]
  91.         0
  92.         0
  93.         
  94.         0
  95.         1
  96.         1
  97.         0
  98.         0
  99.         0
  100.         0
  101.     [nfmt]
  102.         272
  103.         1
  104.         3
  105.         .
  106.         ,
  107.         $
  108.     Body Text
  109.     6
  110.     1
  111.     1560
  112.     1
  113.     3075
  114.     1
  115.     4275
  116.     1
  117.     5655
  118.     1
  119.     7005
  120.     1
  121.     8580
  122.     0
  123. [tag]
  124.     Est<\a>ndar
  125.     5
  126.     [fnt]
  127.         Tms Rmn
  128.         240
  129.         0
  130.         49152
  131.     [algn]
  132.         1
  133.         1
  134.         0
  135.         0
  136.         0
  137.     [spc]
  138.         17
  139.         0
  140.         1
  141.         0
  142.         0
  143.         1
  144.         100
  145.     [brk]
  146.         4
  147.     [line]
  148.         8
  149.         0
  150.         1
  151.         0
  152.         1
  153.         1
  154.         1
  155.         10
  156.         10
  157.         1
  158.     [spec]
  159.         0
  160.         0
  161.         
  162.         0
  163.         1
  164.         1
  165.         0
  166.         0
  167.         0
  168.         0
  169.     [nfmt]
  170.         24
  171.         1
  172.         2
  173.         ,
  174.         .
  175.         Pts
  176.     Est<\a>ndar
  177.     0
  178.     0
  179. [tag]
  180.     Standard
  181.     6
  182.     [fnt]
  183.         Tms Rmn
  184.         240
  185.         0
  186.         49152
  187.     [algn]
  188.         1
  189.         1
  190.         0
  191.         0
  192.         0
  193.     [spc]
  194.         17
  195.         0
  196.         1
  197.         0
  198.         0
  199.         1
  200.         100
  201.     [brk]
  202.         4
  203.     [line]
  204.         8
  205.         0
  206.         1
  207.         0
  208.         1
  209.         1
  210.         1
  211.         10
  212.         10
  213.         1
  214.     [spec]
  215.         0
  216.         0
  217.         
  218.         0
  219.         1
  220.         1
  221.         0
  222.         0
  223.         0
  224.         0
  225.     [nfmt]
  226.         24
  227.         1
  228.         2
  229.         ,
  230.         .
  231.         Pts
  232.     Standard
  233.     0
  234.     0
  235. [lay]
  236.     1
  237.     513
  238.     [rght]
  239.         15840
  240.         12240
  241.         1
  242.         1440
  243.         1440
  244.         1
  245.         1972
  246.         1440
  247.         0
  248.         1
  249.         0
  250.         1
  251.         0
  252.         2
  253.         1
  254.         1440
  255.         10800
  256.         9
  257.         1
  258.         720
  259.         1
  260.         1440
  261.         1
  262.         2160
  263.         1
  264.         2880
  265.         1
  266.         3690
  267.         1
  268.         4815
  269.         1
  270.         5925
  271.         1
  272.         7200
  273.         1
  274.         8535
  275.     [hrght]
  276.     [lyfrm]
  277.         1
  278.         11200
  279.         0
  280.         0
  281.         12240
  282.         1972
  283.         0
  284.         1
  285.         3
  286.         1 0 0 0 0 0 0
  287.         0
  288.         0
  289.         1
  290.     [frmlay]
  291.         1972
  292.         12240
  293.         1
  294.         1440
  295.         0
  296.         1
  297.         792
  298.         1440
  299.         0
  300.         1
  301.         0
  302.         1
  303.         1
  304.         0
  305.         1
  306.         1440
  307.         10800
  308.         0
  309.     [txt]
  310. <+B><:da<*!><* >>
  311.  
  312. <+B>Peyton McManus
  313.  
  314. <+B>Page <:P10,0,> of <:X3,16384;NumPages>11<:X~3,16384;NumPages>
  315.  
  316. <+B>
  317.  
  318. <+B>
  319.  
  320.  
  321. >
  322.     [frght]
  323.     [lyfrm]
  324.         1
  325.         13248
  326.         0
  327.         14400
  328.         12240
  329.         15840
  330.         0
  331.         1
  332.         3
  333.         1 0 0 0 0 0 0
  334.         0
  335.         0
  336.         2
  337.     [frmlay]
  338.         15840
  339.         12240
  340.         1
  341.         1440
  342.         90
  343.         1
  344.         14472
  345.         1440
  346.         0
  347.         1
  348.         0
  349.         1
  350.         1
  351.         0
  352.         1
  353.         1440
  354.         10800
  355.         0
  356.     [txt]
  357. <+B>Revision Number <:da<*&><* >>
  358.  
  359. <+B><:Da> <:b<* >>
  360.  
  361. <+B>
  362.  
  363. >
  364. [elay]
  365. [l1]
  366.     0
  367. [pg]
  368.     10
  369.     49 0 22 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  370.     96 0 10 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  371.     145 0 32 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  372.     194 0 45 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  373.     243 0 28 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  374.     292 0 46 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  375.     341 0 13 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  376.     390 0 15 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  377.     436 0 13 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  378.     464 0 10 1025 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  379. [edoc]
  380. <:#284,9025>Declare GetFlag(p1)
  381.  
  382. <:#284,9025>Declare SetFlag(p1,p2)
  383.  
  384. <:#284,9025>Declare SaveSettings(p1,p2,p3)
  385.  
  386. <:#284,9025>Define    SetTrue()        SetDlgITemText(Hdlg,%1,"True")
  387.  
  388. <:#284,9025>Define    SetFalse()        SetDlgITemText(Hdlg,%1,0)
  389.  
  390. <:#284,9025>Define GetItem()        GetDlgItemText(Hdlg,%1)
  391.  
  392. <:#284,9025>Define    GetPerm()        GetGlobalArray$("perm",%1)
  393.  
  394. <:#284,9025>Define    GetTemp()        GetGlobalArray$("temp",%1)
  395.  
  396. <:#284,9025>Define    Hour_up        67
  397.  
  398. <:#284,9025>Define    Minute_up        66
  399.  
  400. <:#284,9025>Define    Hour_down        57
  401.  
  402. <:#284,9025>Define    Minute_down        56
  403.  
  404. <:#284,9025>define    VK_LBUTTON        0x001
  405.  
  406. <:#284,9025>Define    EnableWindow()    DllCall("User,EnableWindow,AHA",%1,%2)
  407.  
  408. <:#284,9025>Define    SetFocus()        DllCall("User,SetFocus,HH",%1)
  409.  
  410. <:#284,9025>define    FindWindow()     DllCall("user,FindWindow,HCC", %1, %2)
  411.  
  412. <:#284,9025>define     isiconic(hWnd)     DLLCall("user,isiconic,HA", %1)
  413.  
  414. <:#284,9025>
  415.  
  416. <:#284,9025>
  417.  
  418. <:#284,9025>
  419.  
  420. <:#284,9025>define GetActiveWindow()    DllCall("user,GetActiveWindow,H")
  421.  
  422. <:#284,9025>define SetWindowText()    DllCall("user,SetWindowText,IHC", %1, %2)
  423.  
  424. <:#284,9025>define TitleBarMsg()    SetWindowText(GetActiveWindow(), %1)
  425.  
  426. <:#284,9025>define GetWindowText()    DllCall("user,GetWindowText,HHFH", %1, %2, %3)
  427.  
  428. <:#284,9025>
  429.  
  430. <:#284,9025>
  431.  
  432. <:#284,9025>
  433.  
  434. <:#284,9025>
  435.  
  436. <:#284,9025>
  437.  
  438. @Function@<:#293,9025><:><:>Function Multiple()
  439.  
  440. <:#284,9025>IF IsNewWave()
  441.  
  442. <:#284,9025>    Message("Macro no disponible si se ejecuta en HP NewWave.")
  443.  
  444. <:#284,9025>    Exit Function
  445.  
  446. <:#284,9025>ENDIF
  447.  
  448. <:#284,9025>X = 1
  449.  
  450. <:#284,9025>AllocGlobalVar("Perm",200)
  451.  
  452. <:#284,9025>SetGlobalArray("Perm",1,1)
  453.  
  454. <:#284,9025>AllocGlobalVar("Time"2) ' This is the Time Global
  455.  
  456. <:#284,9025>SetGlobalArray("time",1,0)
  457.  
  458. <:#284,9025>SetGlobalArray("time",2,0)
  459.  
  460. <:#284,9025>Mac=GetRunningMacroFile$()
  461.  
  462. <:#284,9025>doc=getdocpath$()
  463.  
  464. <:#284,9025>Filledit(9001,"{doc}*.s?m")
  465.  
  466. <:#284,9025>Filledit(60,1)
  467.  
  468. <:#284,9025>SetDlgCallBack(54,"{Mac}!Time")
  469.  
  470. <:#284,9025>SetDlgCallBack(51,"{Mac}!Options")
  471.  
  472. <:#284,9025>Box=dialogbox(".","Select")
  473.  
  474. <:#284,9025>if Box<<<;>1
  475.  
  476. <:#284,9025>    FreeGlobalVar("Time")
  477.  
  478. <:#284,9025>    FreeGlobalVar("Perm")
  479.  
  480. <:#284,9025>    FreeGlobalVar("Temp")
  481.  
  482. <:#284,9025>    Exit Function
  483.  
  484. <:#284,9025>Endif
  485.  
  486. <:#284,9025>Files=GetDialogField$(8001)
  487.  
  488. <:#284,9025>Call Loadfiles(Files)
  489.  
  490. <:#284,9025>Radio1=getdialogfield$(60)
  491.  
  492. <:#284,9025>Radio2=Getdialogfield$(61)
  493.  
  494. <:#284,9025>If {Radio2}
  495.  
  496. <:#284,9025>    hour=GetGlobalArray$("time",1)
  497.  
  498. <:#284,9025>    Minute=GetGlobalArray$("time",2)
  499.  
  500. <:#284,9025>        IF Hour<;>0 or Minute<;>0
  501.  
  502. <:#284,9025>            Runlater("{Mac}!Go","{hour}:{Minute}")
  503.  
  504. <:#568,9025>            message("La impresi<\s>n comenzar<\a> a las {Hour} horas , {Minute} minutos")
  505.  
  506. <:#284,9025>        Else
  507.  
  508. <:#568,9025>            Message("No se ha especificado la hora. La impresi<\s>n se realizar<\a> ahora.")
  509.  
  510. <:#284,9025>            Call Go()
  511.  
  512. <:#284,9025>        Endif
  513.  
  514. <:#284,9025>Elseif {Radio1}
  515.  
  516. <:#284,9025>    Call Go()
  517.  
  518. <:#284,9025>Endif
  519.  
  520. <:#284,9025>End Function
  521.  
  522. <:#284,9025>
  523.  
  524. <:#284,9025>
  525.  
  526. <:#284,9025>
  527.  
  528. @Function@<:#293,9025><:><:><:><:>Function LoadFiles(Files)
  529.  
  530. <:#284,9025>'SingleStep(1)
  531.  
  532. <:#284,9025>From=1
  533.  
  534. <:#284,9025>Finish=9999
  535.  
  536. <:#284,9025>Flag=1
  537.  
  538. <:#284,9025>Copies=1
  539.  
  540. <:#284,9025>x=1
  541.  
  542. <:#284,9025>dir=getcurrentdir$()
  543.  
  544. <:#284,9025>Total=GetGlobalArray$("Perm",1)
  545.  
  546. <:#284,9025>    Dim LStorage(total)
  547.  
  548. <:#284,9025>        For T=2 to ToTal
  549.  
  550. <:#284,9025>            LStorage(t)=GetGlobalArray$("Perm",t)
  551.  
  552. <:#284,9025>        Next
  553.  
  554. <:#284,9025>While (1)
  555.  
  556. <:#284,9025>        Filename=Strfield$(Files,x," ")
  557.  
  558. <:#284,9025>        if Len(filename)<;>3
  559.  
  560. <:#284,9025>            Found=ArraySearch(&LStorage,Filename,2,"^")
  561.  
  562. <:#284,9025>            IF Found<;>0
  563.  
  564. <:#284,9025>                Temp=LStorage(Found)
  565.  
  566. <:#284,9025>            Else
  567.  
  568. <:#284,9025>        temp="{dir}^{Filename}^{Copies}^{From}^{Finish}^{Flag}"
  569.  
  570. <:#284,9025>            Endif        
  571.  
  572. <:#284,9025>            SetGlobalArray("perm",x+1,Temp)
  573.  
  574. <:#284,9025>            x=x+1
  575.  
  576. <:#284,9025>        Else
  577.  
  578. <:#284,9025>            Break
  579.  
  580. <:#284,9025>        Endif
  581.  
  582. <:#284,9025>Wend
  583.  
  584. <:#284,9025>SetGlobalArray("Perm",1,x)
  585.  
  586. <:#284,9025>End Function
  587.  
  588. <:#284,9025>
  589.  
  590. <:#284,9025>
  591.  
  592. @Function@<:#293,9025><:><:>Function Options(Hdlg,Id,Text)
  593.  
  594. <:#284,9025>Files=GetDlgItemText(Hdlg,8001)
  595.  
  596. <:#284,9025>If Len(files) <<3
  597.  
  598. <:#284,9025>    Message("Debe seleccionar los archivos previamente.")
  599.  
  600. <:#284,9025>    Exit Function
  601.  
  602. <:#284,9025>Endif
  603.  
  604. <:#284,9025>
  605.  
  606. <:#284,9025>Call Loadfiles(Files)
  607.  
  608. <:#284,9025>MaxPerm=GetGlobalArray$("Perm",1)
  609.  
  610. <:#284,9025>AllocGlobalVar("Temp",MaxPerm)
  611.  
  612. <:#284,9025>AllocGlobalVar ("Counter",1)
  613.  
  614. <:#284,9025>SetGlobalVar("Counter",2)
  615.  
  616. <:#284,9025>
  617.  
  618. <:#284,9025>For x=2 to Maxperm
  619.  
  620. <:#284,9025>    Data=GetGlobalArray$("Perm",x)
  621.  
  622. <:#284,9025>    SetGlobalArray("temp",x,Data)
  623.  
  624. <:#284,9025>Next    
  625.  
  626. <:#284,9025>Call SetFirst()
  627.  
  628. <:#284,9025>Mac=GetRunningMacroFile$()
  629.  
  630. <:#284,9025>FillEdit(50,1)
  631.  
  632. <:#284,9025>SetDlgCallBack(8000,"{mac}!Numbering")
  633.  
  634. <:#284,9025>SetDlgCallBack(8001,"{MAc}!Numbering")
  635.  
  636. <:#284,9025>SetDlgCallBack(56,"{mac}!NextFile")
  637.  
  638. <:#284,9025>SetDlgCallBack(57,"{mac}!SaveSettings")
  639.  
  640. <:#284,9025>EnableWindow(Hdlg,0)
  641.  
  642. <:#284,9025>Box=dialogbox(".","Options")
  643.  
  644. <:#284,9025>EnableWindow(Hdlg,1)
  645.  
  646. <:#284,9025>SetFocus(Hdlg)
  647.  
  648. <:#284,9025>if Box = 1
  649.  
  650. <:#284,9025>Call TempToPerm() ' if ok swap temp to perm
  651.  
  652. <:#284,9025>Endif
  653.  
  654. <:#284,9025>FreeGlobalVar("Counter")
  655.  
  656. <:#284,9025>End Function
  657.  
  658. <:#284,9025>
  659.  
  660. <:#284,9025><:><:>
  661.  
  662. @Function@<:#293,9025>Function SaveSettings(Hdlg,Id,Text)
  663.  
  664. <:#284,9025>Lcount=GetGlobalVar$("Counter")
  665.  
  666. <:#284,9025>From=GetDlgItemText(Hdlg,8000)
  667.  
  668. <:#284,9025>Finish=GetDlgItemText(Hdlg,8001)
  669.  
  670. <:#284,9025>Copies=GetdlgItemText(Hdlg,8002)
  671.  
  672. <:#284,9025>Flag=GetFlag(Hdlg)
  673.  
  674. <:#284,9025>Dir=StrField$(GetTemp(Lcount),1,"^")
  675.  
  676. <:#284,9025>Name=StrField$(GetTemp(Lcount),2,"^")
  677.  
  678. <:#284,9025>SaveBack="{Dir}^{Name}^{copies}^{From}^{Finish}^{Flag}"
  679.  
  680. <:#284,9025>'Message(SaveBack)
  681.  
  682. <:#284,9025>SetGlobalArray("Temp",Lcount,SaveBack)
  683.  
  684. <:#284,9025>End Function
  685.  
  686. <:#284,9025>
  687.  
  688. @Function@<:#293,9025>Function NextFile(Hdlg,id,Text)
  689.  
  690. <:#284,9025>SaveSettings(Hdlg,id,Text)
  691.  
  692. <:#284,9025>LCount=GetGlobalVar$("counter")
  693.  
  694. <:#284,9025>Max=GetGlobalArray$("Perm",1)
  695.  
  696. <:#284,9025>If Lcount<<Max
  697.  
  698. <:#284,9025>    Lcount=Lcount+1
  699.  
  700. <:#284,9025>Else
  701.  
  702. <:#284,9025>    Lcount=2
  703.  
  704. <:#284,9025>Endif
  705.  
  706. <:#284,9025>ShowStat=Lcount - 1
  707.  
  708. <:#284,9025>ShowMax=Max - 1
  709.  
  710. <:#284,9025>    Status="File {ShowStat} of {ShowMax}"
  711.  
  712. <:#284,9025>    Name2=UCase$(StrField$(GetTemp(Lcount),2,"^"))
  713.  
  714. <:#284,9025>    Flag=StrField$(GetTemp(Lcount),6,"^")
  715.  
  716. <:#284,9025>    From=StrField$(GetTemp(Lcount),4,"^")
  717.  
  718. <:#284,9025>    fin=StrField$(GetTemp(Lcount),5,"^")
  719.  
  720. <:#284,9025>    Copies=StrField$(GetTemp(Lcount),3,"^")
  721.  
  722. <:#284,9025>    SetFlag(Hdlg,Flag)
  723.  
  724. <:#284,9025>    SetDlgItemText(Hdlg,1002,"{Name2}")
  725.  
  726. <:#284,9025>    SetDlgItemText(Hdlg,8000,from)
  727.  
  728. <:#284,9025>    SetDlgITemText(Hdlg,8001,Fin)
  729.  
  730. <:#284,9025>    SetDlgItemText(Hdlg,8002,Copies)
  731.  
  732. <:#284,9025>    SetDlgItemText(Hdlg,1003,Status)
  733.  
  734. <:#284,9025>SetGlobalVar("counter",lcount)
  735.  
  736. <:#284,9025>End Function
  737.  
  738. <:#284,9025>
  739.  
  740. @Function@<:#293,9025><:><:>Function SetFlag(Hdlg,Flag)
  741.  
  742. <:#284,9025>mask = 1
  743.  
  744. <:#284,9025>for i = 1 to 11
  745.  
  746. <:#284,9025>    If Flag & Mask
  747.  
  748. <:#284,9025>        SetDlgItemText(hDlg, 59 + i, 1)
  749.  
  750. <:#284,9025>    Else
  751.  
  752. <:#284,9025>        SetDlgItemText(Hdlg,59 + i, 0)
  753.  
  754. <:#284,9025>    Endif
  755.  
  756. <:#284,9025>    mask = mask * 2
  757.  
  758. <:#284,9025>If I=3 
  759.  
  760. <:#284,9025>    Mask=Mask*2
  761.  
  762. <:#284,9025>Endif
  763.  
  764. <:#284,9025>next
  765.  
  766. <:#284,9025>If (GetDlgItemText(Hdlg,60)=0) ' if all is no
  767.  
  768. <:#284,9025>    SetDlgItemText(Hdlg,90,1)
  769.  
  770. <:#284,9025>Endif
  771.  
  772. <:#284,9025>if (((GetDlgItemText(Hdlg,68)=0) and (GetDlgItemText(Hdlg,69)=0)))
  773.  
  774. <:#284,9025>    SetdlgItemText(Hdlg,50,1)
  775.  
  776. <:#284,9025>Else
  777.  
  778. <:#284,9025>    SetDlgItemText(Hdlg,50,0)    
  779.  
  780. <:#284,9025>Endif
  781.  
  782. <:#284,9025>End Function
  783.  
  784. <:#284,9025>
  785.  
  786. @Function@<:#293,9025>Function SetFirst()
  787.  
  788. <:#284,9025>Name=Ucase$(Strfield$(GetTemp(2),2,"^"))
  789.  
  790. <:#284,9025>flag=StrField$(GetTemp(2),6,"^")
  791.  
  792. <:#284,9025>From=Strfield$(GetTemp(2),4,"^")
  793.  
  794. <:#284,9025>Finish=Strfield$(GetTemp(2),5,"^")
  795.  
  796. <:#284,9025>Copies=StrField$(GetTemp(2),3,"^")
  797.  
  798. <:#284,9025>Max=GetGlobalArray$("Perm",1) - 1
  799.  
  800. Status="Archivo 1 de {Max}"
  801.  
  802. <:#284,9025>Filledit(1002,Name)
  803.  
  804. <:#284,9025>Filledit(1003,Status)
  805.  
  806. <:#284,9025>Filledit(8000,From)
  807.  
  808. <:#284,9025>Filledit(8001,Finish)
  809.  
  810. <:#284,9025>Filledit(8002,Copies)
  811.  
  812. <:#284,9025>mask = 1
  813.  
  814. <:#284,9025>for i = 1 to 11
  815.  
  816. <:#284,9025>    Filledit(59 + i, flag & mask)
  817.  
  818. <:#284,9025>    mask = mask * 2
  819.  
  820. <:#284,9025>If I=3 
  821.  
  822. <:#284,9025>    Mask=Mask*2
  823.  
  824. <:#284,9025>Endif
  825.  
  826. <:#284,9025>next
  827.  
  828. <:#284,9025>End Function
  829.  
  830. <:#284,9025>
  831.  
  832. @Function@<:#293,9025>Function GetFlag(Hdlg)
  833.  
  834. <:#284,9025>Mask=1
  835.  
  836. <:#284,9025>SumFlag=0
  837.  
  838. <:#284,9025>For x=60 to 70
  839.  
  840. <:#284,9025>    SumFlag=SumFlag+(GetItem(x)*Mask)
  841.  
  842. <:#284,9025>    Mask=Mask*2
  843.  
  844. <:#284,9025>if x=62
  845.  
  846. <:#284,9025>        mask=Mask*2
  847.  
  848. <:#284,9025>Endif
  849.  
  850. <:#284,9025>    
  851.  
  852. <:#284,9025>Next
  853.  
  854. <:#284,9025>Return SumFlag;
  855.  
  856. <:#284,9025>End Function
  857.  
  858. <:#284,9025>
  859.  
  860. @Function@<:#293,9025>Function Numbering(Hdlg,Id,Text)
  861.  
  862. <:#284,9025>SetDlgItemText(Hdlg,60,0)
  863.  
  864. <:#284,9025>SetDlgItemText(Hdlg,90,True)
  865.  
  866. <:#284,9025>End Function
  867.  
  868. <:#284,9025>
  869.  
  870. <:#284,9025>Function TempToPerm()
  871.  
  872. <:#284,9025>' This will dump the contents of the Temp Array into the Perm Array.
  873.  
  874. <:#284,9025>Total=GetGlobalarray$("Perm",1)
  875.  
  876. <:#284,9025>FreeGlobalVar("Perm")
  877.  
  878. <:#284,9025>AllocGlobalVar("Perm",200)
  879.  
  880. <:#284,9025>SetGlobalArray("Perm",1,Total)
  881.  
  882. <:#284,9025>For X= 2 to Total
  883.  
  884. <:#284,9025>    Data=GetGlobalArray$("Temp",x)
  885.  
  886. <:#284,9025>    SetGlobalArray("Perm",x,Data)
  887.  
  888. <:#284,9025>Next
  889.  
  890. <:#284,9025>FreeGlobalVar("Temp")
  891.  
  892. <:#284,9025>End function
  893.  
  894. <:#284,9025>For T=1 to Total
  895.  
  896. <:#284,9025>    
  897.  
  898. <:#284,9025>
  899.  
  900. <:#284,9025>'  This is the time box to allow user to set print time.
  901.  
  902. <:#284,9025>'
  903.  
  904. @Function@<:#293,9025><:><:>Function Time(hdlg,id,text)
  905.  
  906. <:#284,9025>'singlestep(1)
  907.  
  908. <:#284,9025>SetDlgItemText(Hdlg,60,0)
  909.  
  910. <:#284,9025>SetDlgItemText(Hdlg,61,True)
  911.  
  912. <:#284,9025>T = 0
  913.  
  914. <:#284,9025>Mac=GetRunningMacroFile$()
  915.  
  916. <:#284,9025>Today=NOW()
  917.  
  918. <:#284,9025>Time= FormatTime$(Today,3)
  919.  
  920. <:#284,9025>Date=FormatDate$(Today,"f")
  921.  
  922. <:#284,9025>Filledit(1000,Time)
  923.  
  924. <:#284,9025>Filledit(1006,Date)
  925.  
  926. <:#284,9025>Sec=(GetGlobalArray$("time",1) * 3600) + (GetGlobalArray$("time",2) * 60)
  927.  
  928. <:#284,9025>Sec = Sec + Today
  929.  
  930. <:#284,9025>Filledit(1001,FormatDate$(Sec, "f"))
  931.  
  932. <:#284,9025>Filledit(1005,FormatTime$(Sec, 3))
  933.  
  934. <:#284,9025>Filledit(8000, GetGlobalArray$("time",1))
  935.  
  936. <:#284,9025>Filledit(8001,GetGlobalArray$("time",2))
  937.  
  938. <:#284,9025>SetDlgCallBack(Hour_Up,"{Mac}!Timeup")
  939.  
  940. <:#284,9025>SetDlgCallBack(Minute_up,"{Mac}!Timeup")
  941.  
  942. <:#284,9025>SetDlgCallBack(Hour_Down,"{Mac}!TimeDown")
  943.  
  944. <:#284,9025>SetDlgCallBack(Minute_Down,"{Mac}!TimeDown")
  945.  
  946. <:#284,9025>
  947.  
  948. <:#284,9025>EnableWindow(Hdlg,0)
  949.  
  950. <:#284,9025>Box=dialogbox(".","Time")
  951.  
  952. <:#284,9025>EnableWindow(Hdlg,1)
  953.  
  954. <:#284,9025>SetFocus(Hdlg)
  955.  
  956. <:#284,9025>If Box<<<;>1
  957.  
  958. <:#284,9025>    Exit Function
  959.  
  960. <:#284,9025>Endif
  961.  
  962. <:#284,9025>SetGlobalArray("time",1,GetDialogField$(8000))
  963.  
  964. <:#284,9025>SetGlobalArray("time",2,GetDialogField$(8001))
  965.  
  966. <:#284,9025>End Function
  967.  
  968. <:#284,9025>
  969.  
  970. @Function@<:#293,9025><:><:>Function Timeup(hdlg,id,text)
  971.  
  972. <:#284,9025>dllid = DllLoadLib("User", "GetAsyncKeyState", "HH")
  973.  
  974. <:#284,9025>Editbox =8067 - id
  975.  
  976. <:#284,9025>Number=GetDlgItemText(Hdlg,Editbox)
  977.  
  978. <:#284,9025>Number=Number + 1
  979.  
  980. <:#284,9025>if  dllid
  981.  
  982. <:#284,9025>    while (0x8000 & DllCall(dllid, VK_LBUTTON))
  983.  
  984. <:#284,9025>        Number=Number+1
  985.  
  986. <:#284,9025>        if Number <;> 60 
  987.  
  988. <:#284,9025>            Number = 0
  989.  
  990. <:#284,9025>        Endif
  991.  
  992. <:#284,9025>        SetDlgItemText(hdlg, EditBox, Number)
  993.  
  994. <:#284,9025>    wend
  995.  
  996. <:#284,9025>    DllFreeLib(dllid)
  997.  
  998. <:#284,9025>Endif
  999.  
  1000. <:#284,9025>if Number <;> 60 
  1001.  
  1002. <:#284,9025>        Number = 0
  1003.  
  1004. <:#284,9025>    Endif
  1005.  
  1006. <:#284,9025>SetDlgItemText(Hdlg,Editbox,Number)
  1007.  
  1008. <:#284,9025>Call SetTime(Hdlg)
  1009.  
  1010. <:#284,9025>End Function
  1011.  
  1012. <:#284,9025>
  1013.  
  1014. @Function@<:#293,9025><:><:>Function TimeDown(hdlg,id,text)
  1015.  
  1016. <:#284,9025>dllid = DllLoadLib("User", "GetAsyncKeyState", "HH")
  1017.  
  1018. <:#284,9025>Editbox =8057 - id
  1019.  
  1020. <:#284,9025>Number=GetDlgItemText(Hdlg,Editbox)
  1021.  
  1022. <:#284,9025>Number=Number - 1
  1023.  
  1024. <:#284,9025>if  dllid
  1025.  
  1026. <:#284,9025>    while (0x8000 & DllCall(dllid, VK_LBUTTON))
  1027.  
  1028. <:#284,9025>        Number=Number - 1
  1029.  
  1030. <:#284,9025>        if Number << 0 
  1031.  
  1032. <:#284,9025>            Number = 60
  1033.  
  1034. <:#284,9025>        Endif
  1035.  
  1036. <:#284,9025>        SetDlgItemText(hdlg, EditBox, Number)
  1037.  
  1038. <:#284,9025>    wend
  1039.  
  1040. <:#284,9025>    DllFreeLib(dllid)
  1041.  
  1042. <:#284,9025>Endif
  1043.  
  1044. <:#284,9025>    if Number << 0 
  1045.  
  1046. <:#284,9025>        Number = 60
  1047.  
  1048. <:#284,9025>    Endif
  1049.  
  1050. <:#284,9025>SetDlgItemText(Hdlg,Editbox,Number)
  1051.  
  1052. <:#284,9025>Call SetTime(Hdlg)
  1053.  
  1054. <:#284,9025>End Function
  1055.  
  1056. <:#284,9025>
  1057.  
  1058. @Function@<:#293,9025><:><:>Function SetTime(Hdlg)
  1059.  
  1060. <:#284,9025>Today = Now()
  1061.  
  1062. <:#284,9025>Sec=(GetDlgItemText(Hdlg,8000) * 3600) + (GetDlgItemText(Hdlg,8001) * 60)
  1063.  
  1064. <:#284,9025>Sec = Sec + Today
  1065.  
  1066. <:#284,9025>SetDlgItemText(Hdlg,1000,FormatTime$(Today,3))
  1067.  
  1068. <:#284,9025>SetDlgItemText(Hdlg,1006,FormatDate$(Today,"f"))
  1069.  
  1070. <:#284,9025>SetDlgItemText(Hdlg,1001,FormatDate$(Sec, "f"))
  1071.  
  1072. <:#284,9025>SetDlgItemText(Hdlg,1005,FormatTime$(Sec, 3))
  1073.  
  1074. <:#284,9025>End Function
  1075.  
  1076. <:#284,9025>
  1077.  
  1078. @Function@<:#293,9025><:><:><:><:><:><:>Function Go()
  1079.  
  1080. <:#284,9025>HourGlass(on)
  1081.  
  1082. <:#284,9025>hwnd = FindWindow("AmiProWndA", 0)
  1083.  
  1084. <:#284,9025>    if not isiconic(hwnd)
  1085.  
  1086. <:#284,9025>        TitleBarMsg("Por favor, espere. Impresi<\s>n en curso.")
  1087.  
  1088. <:#284,9025>    Endif
  1089.  
  1090. <:#284,9025>StatusBarMsg("Se est<\a> imprimiendo.....")
  1091.  
  1092. <:#284,9025>Total=GetGlobalArray$("Perm",1)
  1093.  
  1094. <:#284,9025>If GetOpenFilecount() <;>0
  1095.  
  1096. <:#284,9025>    If FileChanged(0,1)
  1097.  
  1098. <:#284,9025>        isfileChanged = 1
  1099.  
  1100. <:#284,9025>    Endif
  1101.  
  1102. <:#284,9025>Endif
  1103.  
  1104. <:#284,9025>For y=2 to Total   
  1105.  
  1106. <:#284,9025>    AnswerMsgBox(7)
  1107.  
  1108. <:#284,9025>    Path=StrField$(GetPerm(y),1,"^")
  1109.  
  1110. <:#284,9025>    Drive=Right$(StrField$(Path,1,":"),1)
  1111.  
  1112. <:#284,9025>    Direct=Strfield$(Path,2,":")
  1113.  
  1114. <:#284,9025>    Name=UCase$(StrField$(GetPerm(y),2,"^"))
  1115.  
  1116. <:#284,9025>    Filename="{Drive}:{Direct}{name}"
  1117.  
  1118. <:#284,9025>
  1119.  
  1120. <:#284,9025>    Flag=StrField$(GetPerm(Y),6,"^")
  1121.  
  1122. <:#284,9025>        If ((Flag & 512) or (Flag & 1024))
  1123.  
  1124. <:#284,9025>            Else
  1125.  
  1126. <:#284,9025>                Flag=Flag+1536
  1127.  
  1128. <:#284,9025>        Endif
  1129.  
  1130. <:#284,9025>    From=StrField$(GetPerm(Y),4,"^")
  1131.  
  1132. <:#284,9025>    fin=StrField$(GetPerm(Y),5,"^")
  1133.  
  1134. <:#284,9025>    Copies=StrField$(GetPerm(Y),3,"^")
  1135.  
  1136. <:#284,9025>    StatusBarMsg("Se est<\a> imprimiendo el archivo {Filename} ")
  1137.  
  1138. <:#284,9025>        If 1 = Fileopen("{Filename}",1,"AmiPro")
  1139.  
  1140. <:#284,9025>            FilePrint(copies,From,Fin,Flag)
  1141.  
  1142. <:#284,9025>            FileClose()
  1143.  
  1144. <:#284,9025>        Endif
  1145.  
  1146. <:#284,9025>Next
  1147.  
  1148. <:#284,9025>If GetOpenFilecount()<;>0
  1149.  
  1150. <:#284,9025>    Filechanged(1,1)
  1151.  
  1152. <:#284,9025>Endif
  1153.  
  1154. <:#284,9025>FreeGlobalVar("Time")
  1155.  
  1156. <:#284,9025>FreeGlobalVar("Perm")
  1157.  
  1158. <:#284,9025>TitleBarMsg("")
  1159.  
  1160. <:#284,9025>TitleBarMsg("Ami Pro")
  1161.  
  1162. <:#284,9025>StatusBarMsg("")
  1163.  
  1164. <:#284,9025>HourGlass(off)
  1165.  
  1166. <:#284,9025>End Function
  1167.  
  1168. <:#284,9025>
  1169.  
  1170. <:#284,9025>ChechBoth(Flag)
  1171.  
  1172. <:#284,9025>End Function
  1173.  
  1174. <:#284,9025>
  1175.  
  1176. <:#284,9025>DIALOG    select
  1177.  
  1178. <:#568,9025>-2134376448    10    99    32    130    112    ""    ""    "Archivos para imprimir"
  1179.  
  1180. <:#284,9025>FONT    6    "Helv"
  1181.  
  1182. <:#284,9025>8    16    66    90    9001    1352859659    "listbox"    ""    0 
  1183.  
  1184. <:#284,9025>82    78    38    12    60    1342373897    "button"    "Ahora"    0 
  1185.  
  1186. <:#284,9025>82    90    41    12    61    1342177289    "button"    "Despu<\i>s"    0 
  1187.  
  1188. <:#284,9025>8    4    68    10    7999    1342308352    "static"    ""    0 
  1189.  
  1190. <:#284,9025>18    92    0    0    8001    1350566016    "edit"    ""    0 
  1191.  
  1192. <:#284,9025>78    68    46    36    12    1342177287    "button"    "Imprimir "    0 
  1193.  
  1194. <:#284,9025>79    4    45    14    1    1342373889    "button"    "Aceptar"    0 
  1195.  
  1196. <:#284,9025>79    20    45    14    2    1342373888    "button"    "Cancelar"    0 
  1197.  
  1198. <:#284,9025>79    36    45    14    51    1342373888    "button"    "Opciones..."    0 
  1199.  
  1200. <:#284,9025>79    52    45    14    54    1342373888    "button"    "Hora..."    0 
  1201.  
  1202. <:#284,9025>END DIALOG
  1203.  
  1204. <:#284,9025>
  1205.  
  1206. <:#284,9025>
  1207.  
  1208. <:#284,9025>DIALOG    Time
  1209.  
  1210. <:#568,9025>-2134376448    14    69    52    180    76    ""    ""    "Hora de impresi<\s>n"
  1211.  
  1212. <:#284,9025>FONT    6    "Helv"
  1213.  
  1214. <:#284,9025>30    28    14    12    8000    1350631424    "edit"    ""    0 
  1215.  
  1216. <:#284,9025>81    28    13    12    8001    1350631424    "edit"    ""    0 
  1217.  
  1218. <:#284,9025>136    4    40    14    1    1342242817    "button"    "Aceptar"    0 
  1219.  
  1220. <:#284,9025>136    20    40    14    2    1342242816    "button"    "Cancelar"    0 
  1221.  
  1222. <:#284,9025>94    5    40    10    1000    1342177281    "static"    " "    0 
  1223.  
  1224. <:#284,9025>27    18    22    10    1002    1342177280    "static"    "Horas"    0 
  1225.  
  1226. <:#284,9025>76    18    29    9    1003    1342177280    "static"    "Minutos"    0 
  1227.  
  1228. <:#284,9025>20    28    10    12    57    1342177280    "button"    "<<"    0 
  1229.  
  1230. <:#284,9025>44    28    11    12    67    1342177280    "button"    "<;>"    0 
  1231.  
  1232. <:#284,9025>70    28    11    12    56    1342177280    "button"    "<<"    0 
  1233.  
  1234. <:#284,9025>94    28    11    12    66    1342242816    "button"    "<;>"    0 
  1235.  
  1236. <:#284,9025>6    6    84    10    1006    1342177281    "static"    ""    0 
  1237.  
  1238. <:#284,9025>4    56    84    10    1001    1342177281    "static"    ""    0 
  1239.  
  1240. <:#284,9025>93    56    43    10    1005    1342177281    "static"    ""    0 
  1241.  
  1242. <:#284,9025>END DIALOG
  1243.  
  1244. <:#284,9025>
  1245.  
  1246. DIALOG    options
  1247.  
  1248. -2134376448    27    40    41    225    134    ""    ""    "Opciones de impresi<\s>n por lotes"
  1249.  
  1250. FONT    6    "Helv"
  1251.  
  1252. <:#284,9025>70    16    16    12    8002    1350631552    "edit"    ""    0 
  1253.  
  1254. <:#284,9025>50    30    32    12    60    1342373897    "button"    "Todas"    0 
  1255.  
  1256. <:#284,9025>84    42    22    12    8000    1350631424    "edit"    ""    0 
  1257.  
  1258. <:#284,9025>120    42    22    12    8001    1350631424    "edit"    ""    0 
  1259.  
  1260. <:#284,9025>50    56    34    12    50    1342373897    "button"    "Ambas"    0 
  1261.  
  1262. <:#284,9025>88    56    30    12    68    1342177289    "button"    "Pares"    0 
  1263.  
  1264. <:#284,9025>124    56    41    12    69    1342177289    "button"    "Impares"    0 
  1265.  
  1266. <:#284,9025>50    42    28    12    90    1342308361    "button"    "De:"    0 
  1267.  
  1268. <:#284,9025>110    44    7    10    1001    1342177280    "static"    "A:"    0 
  1269.  
  1270. <:#284,9025>40    4    60    10    1002    1342177280    "static"    ""    0 
  1271.  
  1272. <:#284,9025>10    78    61    12    61    1342373891    "button"    "Invertir orden"    0 
  1273.  
  1274. <:#284,9025>10    90    50    12    62    1342242819    "button"    "Clasificar"    0 
  1275.  
  1276. <:#284,9025>10    102    64    12    63    1342242819    "button"    "Marcas de corte"    0 
  1277.  
  1278. <:#284,9025>10    114    66    12    70    1342242819    "button"    "Sin im<\a>genes"    0 
  1279.  
  1280. <:#568,9025>104    78    82    12    64    1342242819    "button"    "Con descripci<\s>n doc"    0 
  1281.  
  1282. <:#568,9025>104    90    88    12    65    1342242819    "button"    "En papel preimpreso"    0 
  1283.  
  1284. <:#568,9025>104    102    107    12    66    1342242819    "button"    "Actualizar campos de acci<\s>n"    0 
  1285.  
  1286. <:#284,9025>104    114    67    12    67    1342242819    "button"    "Con notas"    0 
  1287.  
  1288. <:#568,9025>6    18    62    10    1000    1342308352    "static"    "N<\z>mero de copias:"    0 
  1289.  
  1290. <:#284,9025>105    4    54    10    1003    1342177280    "static"    ""    0 
  1291.  
  1292. <:#284,9025>6    4    29    10    1004    1342177280    "static"    "Archivo:"    0 
  1293.  
  1294. <:#568,9025>6    30    42    20    1005    1342177280    "static"    "Grupo de p<\a>ginas:"    0 
  1295.  
  1296. <:#284,9025>6    68    212    62    33    1342177287    "button"    "Otras opciones"    0 
  1297.  
  1298. <:#284,9025>16    58    32    10    1006    1342177280    "static"    "P<\a>ginas:"    0 
  1299.  
  1300. <:#284,9025>172    6    44    14    1    1342373889    "button"    "Aceptar"    0 
  1301.  
  1302. <:#284,9025>172    22    44    14    2    1342373888    "button"    "Cancelar"    0 
  1303.  
  1304. <:#284,9025>172    38    44    14    56    1342373888    "button"    "Guardar -<;>"    0 
  1305.  
  1306. <:#284,9025>END DIALOG
  1307.  
  1308. >
  1309.  
  1310. [Embedded]
  1311. 00022595
  1312. >
  1313. [macsum] 18
  1314. Multiple 0 0 10 29
  1315. LoadFiles 856 1 13 74
  1316. Options 1473 3 7 106
  1317. SaveSettings 2227 3 9 141
  1318. NextFile 2549 3 11 154
  1319. SetFlag 3227 2 3 180
  1320. SetFirst 3724 0 10 203
  1321. GetFlag 4359 1 4 226
  1322. Numbering 4632 3 1 240
  1323. TempToPerm 4692 0 4 245
  1324. Time 4965 3 7 262
  1325. Timeup 5719 3 4 295
  1326. TimeDown 6116 3 4 317
  1327. SetTime 6515 1 3 339
  1328. Go 6815 0 14 349
  1329. select 8205 0 -1 398
  1330. Time 8769 0 -1 414
  1331. options 9480 0 -1 433
  1332. [macse]
  1333. 14 Multiple
  1334. 0 1317
  1335. 13
  1336. 11 00000106
  1337. 0 3 "Macro no disponible si se ejecuta en HP NewWave."
  1338. 6 0
  1339. 15
  1340. 9
  1341. 5 1
  1342. 8 1
  1343. 0 271 "Perm" 200
  1344. 0 272 "Perm" 1 1
  1345. 0 271 "Time" 2
  1346. 0 272 "time" 1 0
  1347. 0 272 "time" 2 0
  1348. 0 802
  1349. 13
  1350. 8 2
  1351. 0 268
  1352. 13
  1353. 8 3
  1354. 0 31 9001 "{3}*.s?m"
  1355. 0 31 60 1
  1356. 0 41 54 "{2}!Time"
  1357. 0 41 51 "{2}!Options"
  1358. 0 26 "." "Select"
  1359. 13
  1360. 8 4
  1361. 6 4
  1362. 5 1
  1363. 18 1
  1364. 11 00000423
  1365. 0 266 "Time"
  1366. 0 266 "Perm"
  1367. 0 266 "Temp"
  1368. 6 0
  1369. 15
  1370. 9
  1371. 0 27 8001
  1372. 13
  1373. 8 5
  1374. 16 Loadfiles "{5}"
  1375. 0 27 60
  1376. 13
  1377. 8 6
  1378. 0 27 61
  1379. 13
  1380. 8 7
  1381. 6 7
  1382. 11 00000819
  1383. 0 273 "time" 1
  1384. 13
  1385. 8 8
  1386. 0 273 "time" 2
  1387. 13
  1388. 8 9
  1389. 6 8
  1390. 5 0
  1391. 18 3
  1392. 6 9
  1393. 5 0
  1394. 18 3
  1395. 1 2
  1396. 11 00000722
  1397. 0 285 "{2}!Go" "{8}:{9}"
  1398. 0 3 "La impresi<\s>n comenzar<\a> a las {8} horas , {9} minutos"
  1399. 10 00000806
  1400. 0 3 "No se ha especificado la hora. La impresi<\s>n se realizar<\a> ahora."
  1401. 16 Go
  1402. 10 00000844
  1403. 6 6
  1404. 11 00000844
  1405. 16 Go
  1406. 6 0
  1407. 15
  1408. 9
  1409. 14 LoadFiles
  1410. 5 1
  1411. 8 2
  1412. 5 9999
  1413. 8 3
  1414. 5 1
  1415. 8 4
  1416. 5 1
  1417. 8 5
  1418. 5 1
  1419. 8 6
  1420. 0 290
  1421. 13
  1422. 8 7
  1423. 0 273 "Perm" 1
  1424. 13
  1425. 8 8
  1426. 6 8
  1427. 21 9 [X]
  1428. 5 2
  1429. 8 10
  1430. 6 8
  1431. 6 10
  1432. 18 2
  1433. 12 00000212
  1434. 10 00000262
  1435. 5 1
  1436. 6 10
  1437. 3 0
  1438. 8 10
  1439. 10 00000134
  1440. 6 10
  1441. 0 273 "Perm" "{10}"
  1442. 13
  1443. 23 9
  1444. 10 00000177
  1445. 5 1
  1446. 11 00000583
  1447. 0 20 "{0}" "{6}" " "
  1448. 13
  1449. 8 11
  1450. 0 14 "{11}"
  1451. 13
  1452. 5 3
  1453. 18 3
  1454. 11 00000557
  1455. 0 1044 &9 "{11}" 2 "^"
  1456. 13
  1457. 8 12
  1458. 6 12
  1459. 5 0
  1460. 18 3
  1461. 11 00000448
  1462. 6 12
  1463. 22 9
  1464. 8 13
  1465. 10 00000484
  1466. 7 "{7}^{11}^{5}^{2}^{3}^{4}"
  1467. 8 13
  1468. 6 6
  1469. 5 1
  1470. 3 0
  1471. 0 272 "perm" [X] "{13}"
  1472. 6 6
  1473. 5 1
  1474. 3 0
  1475. 8 6
  1476. 10 00000570
  1477. 10 00000583
  1478. 10 00000262
  1479. 0 272 "Perm" 1 "{6}"
  1480. 6 1
  1481. 15
  1482. 9
  1483. 14 Options
  1484. 0 42 "{0}" 8001
  1485. 13
  1486. 8 4
  1487. 0 14 "{4}"
  1488. 13
  1489. 5 3
  1490. 18 5
  1491. 11 00000140
  1492. 0 3 "Debe seleccionar los archivos previamente."
  1493. 6 3
  1494. 15
  1495. 9
  1496. 16 Loadfiles "{4}"
  1497. 0 273 "Perm" 1
  1498. 13
  1499. 8 5
  1500. 0 271 "Temp" "{5}"
  1501. 0 271 "Counter" 1
  1502. 0 264 "Counter" 2
  1503. 5 2
  1504. 8 6
  1505. 6 5
  1506. 6 6
  1507. 18 2
  1508. 12 00000328
  1509. 10 00000396
  1510. 5 1
  1511. 6 6
  1512. 3 0
  1513. 8 6
  1514. 10 00000253
  1515. 0 273 "Perm" "{6}"
  1516. 13
  1517. 8 7
  1518. 0 272 "temp" "{6}" "{7}"
  1519. 10 00000295
  1520. 16 SetFirst
  1521. 0 802
  1522. 13
  1523. 8 8
  1524. 0 31 50 1
  1525. 0 41 8000 "{8}!Numbering"
  1526. 0 41 8001 "{8}!Numbering"
  1527. 0 41 56 "{8}!NextFile"
  1528. 0 41 57 "{8}!SaveSettings"
  1529. 0 284 "User,EnableWindow,AHA" "{0}" 0
  1530. 0 26 "." "Options"
  1531. 13
  1532. 8 9
  1533. 0 284 "User,EnableWindow,AHA" "{0}" 1
  1534. 0 284 "User,SetFocus,HH" "{0}"
  1535. 6 9
  1536. 5 1
  1537. 18 0
  1538. 11 00000725
  1539. 16 TempToPerm
  1540. 0 266 "Counter"
  1541. 6 3
  1542. 15
  1543. 9
  1544. 14 SaveSettings
  1545. 0 265 "Counter"
  1546. 13
  1547. 8 4
  1548. 0 42 "{0}" 8000
  1549. 13
  1550. 8 5
  1551. 0 42 "{0}" 8001
  1552. 13
  1553. 8 6
  1554. 0 42 "{0}" 8002
  1555. 13
  1556. 8 7
  1557. 16 GetFlag "{0}"
  1558. 13
  1559. 8 8
  1560. 0 273 "temp" "{4}"
  1561. 13
  1562. 0 20 [X] 1 "^"
  1563. 13
  1564. 8 9
  1565. 0 273 "temp" "{4}"
  1566. 13
  1567. 0 20 [X] 2 "^"
  1568. 13
  1569. 8 10
  1570. 7 "{9}^{10}^{7}^{5}^{6}^{8}"
  1571. 8 11
  1572. 0 272 "Temp" "{4}" "{11}"
  1573. 6 3
  1574. 15
  1575. 9
  1576. 14 NextFile
  1577. 16 SaveSettings "{0}" "{1}" "{2}"
  1578. 0 265 "counter"
  1579. 13
  1580. 8 4
  1581. 0 273 "Perm" 1
  1582. 13
  1583. 8 5
  1584. 6 4
  1585. 6 5
  1586. 18 5
  1587. 11 00000161
  1588. 6 4
  1589. 5 1
  1590. 3 0
  1591. 8 4
  1592. 10 00000171
  1593. 5 2
  1594. 8 4
  1595. 6 4
  1596. 5 1
  1597. 3 1
  1598. 8 6
  1599. 6 5
  1600. 5 1
  1601. 3 1
  1602. 8 7
  1603. 7 "File {6} of {7}"
  1604. 8 8
  1605. 0 273 "temp" "{4}"
  1606. 13
  1607. 0 20 [X] 2 "^"
  1608. 13
  1609. 0 18 [X]
  1610. 13
  1611. 8 9
  1612. 0 273 "temp" "{4}"
  1613. 13
  1614. 0 20 [X] 6 "^"
  1615. 13
  1616. 8 10
  1617. 0 273 "temp" "{4}"
  1618. 13
  1619. 0 20 [X] 4 "^"
  1620. 13
  1621. 8 11
  1622. 0 273 "temp" "{4}"
  1623. 13
  1624. 0 20 [X] 5 "^"
  1625. 13
  1626. 8 12
  1627. 0 273 "temp" "{4}"
  1628. 13
  1629. 0 20 [X] 3 "^"
  1630. 13
  1631. 8 13
  1632. 16 SetFlag "{0}" "{10}"
  1633. 0 43 "{0}" 1002 "{9}"
  1634. 0 43 "{0}" 8000 "{11}"
  1635. 0 43 "{0}" 8001 "{12}"
  1636. 0 43 "{0}" 8002 "{13}"
  1637. 0 43 "{0}" 1003 "{8}"
  1638. 0 264 "counter" "{4}"
  1639. 6 3
  1640. 15
  1641. 9
  1642. 14 SetFlag
  1643. 5 1
  1644. 8 3
  1645. 5 1
  1646. 8 4
  1647. 5 11
  1648. 6 4
  1649. 18 2
  1650. 12 00000108
  1651. 10 00000300
  1652. 5 1
  1653. 6 4
  1654. 3 0
  1655. 8 4
  1656. 10 00000032
  1657. 6 1
  1658. 6 3
  1659. 25 1
  1660. 11 00000184
  1661. 5 59
  1662. 6 4
  1663. 3 0
  1664. 0 43 "{0}" [X] 1
  1665. 10 00000218
  1666. 5 59
  1667. 6 4
  1668. 3 0
  1669. 0 43 "{0}" [X] 0
  1670. 6 3
  1671. 5 2
  1672. 4 0
  1673. 8 3
  1674. 6 4
  1675. 5 3
  1676. 18 0
  1677. 11 00000287
  1678. 6 3
  1679. 5 2
  1680. 4 0
  1681. 8 3
  1682. 10 00000075
  1683. 0 42 "{0}" 60
  1684. 13
  1685. 5 0
  1686. 18 0
  1687. 11 00000360
  1688. 0 43 "{0}" 90 1
  1689. 0 42 "{0}" 68
  1690. 13
  1691. 5 0
  1692. 18 0
  1693. 0 42 "{0}" 69
  1694. 13
  1695. 5 0
  1696. 18 0
  1697. 1 1
  1698. 11 00000468
  1699. 0 43 "{0}" 50 1
  1700. 10 00000485
  1701. 0 43 "{0}" 50 0
  1702. 6 2
  1703. 15
  1704. 9
  1705. 14 SetFirst
  1706. 0 273 "temp" 2
  1707. 13
  1708. 0 20 [X] 2 "^"
  1709. 13
  1710. 0 18 [X]
  1711. 13
  1712. 8 1
  1713. 0 273 "temp" 2
  1714. 13
  1715. 0 20 [X] 6 "^"
  1716. 13
  1717. 8 2
  1718. 0 273 "temp" 2
  1719. 13
  1720. 0 20 [X] 4 "^"
  1721. 13
  1722. 8 3
  1723. 0 273 "temp" 2
  1724. 13
  1725. 0 20 [X] 5 "^"
  1726. 13
  1727. 8 4
  1728. 0 273 "temp" 2
  1729. 13
  1730. 0 20 [X] 3 "^"
  1731. 13
  1732. 8 5
  1733. 0 273 "Perm" 1
  1734. 13
  1735. 5 1
  1736. 3 1
  1737. 8 6
  1738. 7 "Archivo 1 de {6}"
  1739. 8 7
  1740. 0 31 1002 "{1}"
  1741. 0 31 1003 "{7}"
  1742. 0 31 8000 "{3}"
  1743. 0 31 8001 "{4}"
  1744. 0 31 8002 "{5}"
  1745. 5 1
  1746. 8 8
  1747. 5 1
  1748. 8 9
  1749. 5 11
  1750. 6 9
  1751. 18 2
  1752. 12 00000495
  1753. 10 00000623
  1754. 5 1
  1755. 6 9
  1756. 3 0
  1757. 8 9
  1758. 10 00000419
  1759. 5 59
  1760. 6 9
  1761. 3 0
  1762. 6 2
  1763. 6 8
  1764. 25 1
  1765. 0 31 [X] [X]
  1766. 6 8
  1767. 5 2
  1768. 4 0
  1769. 8 8
  1770. 6 9
  1771. 5 3
  1772. 18 0
  1773. 11 00000610
  1774. 6 8
  1775. 5 2
  1776. 4 0
  1777. 8 8
  1778. 10 00000462
  1779. 6 0
  1780. 15
  1781. 9
  1782. 14 GetFlag
  1783. 5 1
  1784. 8 2
  1785. 5 0
  1786. 8 3
  1787. 5 60
  1788. 8 4
  1789. 5 70
  1790. 6 4
  1791. 18 2
  1792. 12 00000119
  1793. 10 00000249
  1794. 5 1
  1795. 6 4
  1796. 3 0
  1797. 8 4
  1798. 10 00000043
  1799. 6 3
  1800. 0 42 "{0}" "{4}"
  1801. 13
  1802. 6 2
  1803. 4 0
  1804. 3 0
  1805. 8 3
  1806. 6 2
  1807. 5 2
  1808. 4 0
  1809. 8 2
  1810. 6 4
  1811. 5 62
  1812. 18 0
  1813. 11 00000236
  1814. 6 2
  1815. 5 2
  1816. 4 0
  1817. 8 2
  1818. 10 00000086
  1819. 6 3
  1820. 15
  1821. 9
  1822. 6 1
  1823. 15
  1824. 9
  1825. 14 Numbering
  1826. 0 43 "{0}" 60 0
  1827. 0 43 "{0}" 90 1
  1828. 6 3
  1829. 15
  1830. 9
  1831. 14 TempToPerm
  1832. 0 273 "Perm" 1
  1833. 13
  1834. 8 1
  1835. 0 266 "Perm"
  1836. 0 271 "Perm" 200
  1837. 0 272 "Perm" 1 "{1}"
  1838. 5 2
  1839. 8 2
  1840. 6 1
  1841. 6 2
  1842. 18 2
  1843. 12 00000179
  1844. 10 00000247
  1845. 5 1
  1846. 6 2
  1847. 3 0
  1848. 8 2
  1849. 10 00000104
  1850. 0 273 "Temp" "{2}"
  1851. 13
  1852. 8 3
  1853. 0 272 "Perm" "{2}" "{3}"
  1854. 10 00000146
  1855. 0 266 "Temp"
  1856. 6 0
  1857. 15
  1858. 9
  1859. 14 Time
  1860. 0 43 "{0}" 60 0
  1861. 0 43 "{0}" 61 1
  1862. 5 0
  1863. 8 4
  1864. 0 802
  1865. 13
  1866. 8 5
  1867. 0 772
  1868. 13
  1869. 8 6
  1870. 0 773 "{6}" 3
  1871. 13
  1872. 8 3
  1873. 0 770 "{6}" "f"
  1874. 13
  1875. 8 7
  1876. 0 31 1000 "{3}"
  1877. 0 31 1006 "{7}"
  1878. 0 273 "time" 1
  1879. 13
  1880. 5 3600
  1881. 4 0
  1882. 0 273 "time" 2
  1883. 13
  1884. 5 60
  1885. 4 0
  1886. 3 0
  1887. 8 8
  1888. 6 8
  1889. 6 6
  1890. 3 0
  1891. 8 8
  1892. 0 770 "{8}" "f"
  1893. 13
  1894. 0 31 1001 [X]
  1895. 0 773 "{8}" 3
  1896. 13
  1897. 0 31 1005 [X]
  1898. 0 273 "time" 1
  1899. 13
  1900. 0 31 8000 [X]
  1901. 0 273 "time" 2
  1902. 13
  1903. 0 31 8001 [X]
  1904. 0 41 67 "{5}!Timeup"
  1905. 0 41 66 "{5}!Timeup"
  1906. 0 41 57 "{5}!TimeDown"
  1907. 0 41 56 "{5}!TimeDown"
  1908. 0 284 "User,EnableWindow,AHA" "{0}" 0
  1909. 0 26 "." "Time"
  1910. 13
  1911. 8 9
  1912. 0 284 "User,EnableWindow,AHA" "{0}" 1
  1913. 0 284 "User,SetFocus,HH" "{0}"
  1914. 6 9
  1915. 5 1
  1916. 18 1
  1917. 11 00000672
  1918. 6 3
  1919. 15
  1920. 9
  1921. 0 27 8000
  1922. 13
  1923. 0 272 "time" 1 [X]
  1924. 0 27 8001
  1925. 13
  1926. 0 272 "time" 2 [X]
  1927. 6 3
  1928. 15
  1929. 9
  1930. 14 Timeup
  1931. 0 297 "User" "GetAsyncKeyState" "HH"
  1932. 13
  1933. 8 4
  1934. 5 8067
  1935. 6 1
  1936. 3 1
  1937. 8 5
  1938. 0 42 "{0}" "{5}"
  1939. 13
  1940. 8 6
  1941. 6 6
  1942. 5 1
  1943. 3 0
  1944. 8 6
  1945. 6 4
  1946. 11 00000303
  1947. 5 32768
  1948. 0 284 "{4}" 1
  1949. 13
  1950. 25 1
  1951. 11 00000290
  1952. 6 6
  1953. 5 1
  1954. 3 0
  1955. 8 6
  1956. 6 6
  1957. 5 60
  1958. 18 3
  1959. 11 00000253
  1960. 5 0
  1961. 8 6
  1962. 0 43 "{0}" "{5}" "{6}"
  1963. 10 00000146
  1964. 0 298 "{4}"
  1965. 6 6
  1966. 5 60
  1967. 18 3
  1968. 11 00000343
  1969. 5 0
  1970. 8 6
  1971. 0 43 "{0}" "{5}" "{6}"
  1972. 16 SetTime "{0}"
  1973. 6 3
  1974. 15
  1975. 9
  1976. 14 TimeDown
  1977. 0 297 "User" "GetAsyncKeyState" "HH"
  1978. 13
  1979. 8 4
  1980. 5 8057
  1981. 6 1
  1982. 3 1
  1983. 8 5
  1984. 0 42 "{0}" "{5}"
  1985. 13
  1986. 8 6
  1987. 6 6
  1988. 5 1
  1989. 3 1
  1990. 8 6
  1991. 6 4
  1992. 11 00000305
  1993. 5 32768
  1994. 0 284 "{4}" 1
  1995. 13
  1996. 25 1
  1997. 11 00000292
  1998. 6 6
  1999. 5 1
  2000. 3 1
  2001. 8 6
  2002. 6 6
  2003. 5 0
  2004. 18 5
  2005. 11 00000255
  2006. 5 60
  2007. 8 6
  2008. 0 43 "{0}" "{5}" "{6}"
  2009. 10 00000148
  2010. 0 298 "{4}"
  2011. 6 6
  2012. 5 0
  2013. 18 5
  2014. 11 00000345
  2015. 5 60
  2016. 8 6
  2017. 0 43 "{0}" "{5}" "{6}"
  2018. 16 SetTime "{0}"
  2019. 6 3
  2020. 15
  2021. 9
  2022. 14 SetTime
  2023. 0 772
  2024. 13
  2025. 8 2
  2026. 0 42 "{0}" 8000
  2027. 13
  2028. 5 3600
  2029. 4 0
  2030. 0 42 "{0}" 8001
  2031. 13
  2032. 5 60
  2033. 4 0
  2034. 3 0
  2035. 8 3
  2036. 6 3
  2037. 6 2
  2038. 3 0
  2039. 8 3
  2040. 0 773 "{2}" 3
  2041. 13
  2042. 0 43 "{0}" 1000 [X]
  2043. 0 770 "{2}" "f"
  2044. 13
  2045. 0 43 "{0}" 1006 [X]
  2046. 0 770 "{3}" "f"
  2047. 13
  2048. 0 43 "{0}" 1001 [X]
  2049. 0 773 "{3}" 3
  2050. 13
  2051. 0 43 "{0}" 1005 [X]
  2052. 6 1
  2053. 15
  2054. 9
  2055. 14 Go
  2056. 0 296 1
  2057. 0 284 "user,FindWindow,HCC" "AmiProWndA" 0
  2058. 13
  2059. 8 1
  2060. 0 284 "user,isiconic,HA" "{1}"
  2061. 13
  2062. 1 3
  2063. 11 00000239
  2064. 0 284 "user,GetActiveWindow,H"
  2065. 13
  2066. 0 284 "user,SetWindowText,IHC" [X] "Por favor, espere. Impresi<\s>n en curso."
  2067. 0 789 "Se est<\a> imprimiendo....."
  2068. 0 273 "Perm" 1
  2069. 13
  2070. 8 2
  2071. 0 1050
  2072. 13
  2073. 5 0
  2074. 18 3
  2075. 11 00000374
  2076. 0 34 0 1
  2077. 13
  2078. 11 00000374
  2079. 5 1
  2080. 8 3
  2081. 5 2
  2082. 8 4
  2083. 6 2
  2084. 6 4
  2085. 18 2
  2086. 12 00000459
  2087. 10 00001128
  2088. 5 1
  2089. 6 4
  2090. 3 0
  2091. 8 4
  2092. 10 00000384
  2093. 0 291 7
  2094. 0 273 "perm" "{4}"
  2095. 13
  2096. 0 20 [X] 1 "^"
  2097. 13
  2098. 8 5
  2099. 0 20 "{5}" 1 ":"
  2100. 13
  2101. 0 807 [X] 1
  2102. 13
  2103. 8 6
  2104. 0 20 "{5}" 2 ":"
  2105. 13
  2106. 8 7
  2107. 0 273 "perm" "{4}"
  2108. 13
  2109. 0 20 [X] 2 "^"
  2110. 13
  2111. 0 18 [X]
  2112. 13
  2113. 8 8
  2114. 7 "{6}:{7}{8}"
  2115. 8 9
  2116. 0 273 "perm" "{4}"
  2117. 13
  2118. 0 20 [X] 6 "^"
  2119. 13
  2120. 8 10
  2121. 6 10
  2122. 5 512
  2123. 25 1
  2124. 6 10
  2125. 5 1024
  2126. 25 1
  2127. 1 2
  2128. 11 00000792
  2129. 10 00000817
  2130. 6 10
  2131. 5 1536
  2132. 3 0
  2133. 8 10
  2134. 0 273 "perm" "{4}"
  2135. 13
  2136. 0 20 [X] 4 "^"
  2137. 13
  2138. 8 11
  2139. 0 273 "perm" "{4}"
  2140. 13
  2141. 0 20 [X] 5 "^"
  2142. 13
  2143. 8 12
  2144. 0 273 "perm" "{4}"
  2145. 13
  2146. 0 20 [X] 3 "^"
  2147. 13
  2148. 8 13
  2149. 0 789 "Se est<\a> imprimiendo el archivo {9} "
  2150. 5 1
  2151. 2 102 1 "{9}" 1 "AmiPro"
  2152. 13
  2153. 18 0
  2154. 11 00001115
  2155. 2 111 1 "{13}" "{11}" "{12}" "{10}"
  2156. 2 147 1
  2157. 10 00000426
  2158. 0 1050
  2159. 13
  2160. 5 0
  2161. 18 3
  2162. 11 00001174
  2163. 0 34 1 1
  2164. 0 266 "Time"
  2165. 0 266 "Perm"
  2166. 0 284 "user,GetActiveWindow,H"
  2167. 13
  2168. 0 284 "user,SetWindowText,IHC" [X] ""
  2169. 0 284 "user,GetActiveWindow,H"
  2170. 13
  2171. 0 284 "user,SetWindowText,IHC" [X] "Ami Pro"
  2172. 0 789 ""
  2173. 0 296 0
  2174. 6 0
  2175. 15
  2176. 9
  2177. DIALOG select
  2178. -2134376448 10 99 32 130 112 "" "" "Archivos para imprimir" 
  2179. FONT 6 "Helv" 
  2180. 8 16 66 90 9001 1352859659 "listbox" "" 0 
  2181. 82 78 38 12 60 1342373897 "button" "Ahora" 0 
  2182. 82 90 41 12 61 1342177289 "button" "DespuΘs" 0 
  2183. 8 4 68 10 7999 1342308352 "static" "" 0 
  2184. 18 92 0 0 8001 1350566016 "edit" "" 0 
  2185. 78 68 46 36 12 1342177287 "button" "Imprimir " 0 
  2186. 79 4 45 14 1 1342373889 "button" "Aceptar" 0 
  2187. 79 20 45 14 2 1342373888 "button" "Cancelar" 0 
  2188. 79 36 45 14 51 1342373888 "button" "Opciones..." 0 
  2189. 79 52 45 14 54 1342373888 "button" "Hora..." 0 
  2190. DIALOG Time
  2191. -2134376448 14 69 52 180 76 "" "" "Hora de impresi≤n" 
  2192. FONT 6 "Helv" 
  2193. 30 28 14 12 8000 1350631424 "edit" "" 0 
  2194. 81 28 13 12 8001 1350631424 "edit" "" 0 
  2195. 136 4 40 14 1 1342242817 "button" "Aceptar" 0 
  2196. 136 20 40 14 2 1342242816 "button" "Cancelar" 0 
  2197. 94 5 40 10 1000 1342177281 "static" " " 0 
  2198. 27 18 22 10 1002 1342177280 "static" "Horas" 0 
  2199. 76 18 29 9 1003 1342177280 "static" "Minutos" 0 
  2200. 20 28 10 12 57 1342177280 "button" "<" 0 
  2201. 44 28 11 12 67 1342177280 "button" ">" 0 
  2202. 70 28 11 12 56 1342177280 "button" "<" 0 
  2203. 94 28 11 12 66 1342242816 "button" ">" 0 
  2204. 6 6 84 10 1006 1342177281 "static" "" 0 
  2205. 4 56 84 10 1001 1342177281 "static" "" 0 
  2206. 93 56 43 10 1005 1342177281 "static" "" 0 
  2207. DIALOG options
  2208. -2134376448 27 40 41 225 134 "" "" "Opciones de impresi≤n por lotes" 
  2209. FONT 6 "Helv" 
  2210. 70 16 16 12 8002 1350631552 "edit" "" 0 
  2211. 50 30 32 12 60 1342373897 "button" "Todas" 0 
  2212. 84 42 22 12 8000 1350631424 "edit" "" 0 
  2213. 120 42 22 12 8001 1350631424 "edit" "" 0 
  2214. 50 56 34 12 50 1342373897 "button" "Ambas" 0 
  2215. 88 56 30 12 68 1342177289 "button" "Pares" 0 
  2216. 124 56 41 12 69 1342177289 "button" "Impares" 0 
  2217. 50 42 28 12 90 1342308361 "button" "De:" 0 
  2218. 110 44 7 10 1001 1342177280 "static" "A:" 0 
  2219. 40 4 60 10 1002 1342177280 "static" "" 0 
  2220. 10 78 61 12 61 1342373891 "button" "Invertir orden" 0 
  2221. 10 90 50 12 62 1342242819 "button" "Clasificar" 0 
  2222. 10 102 64 12 63 1342242819 "button" "Marcas de corte" 0 
  2223. 10 114 66 12 70 1342242819 "button" "Sin imßgenes" 0 
  2224. 104 78 82 12 64 1342242819 "button" "Con descripci≤n doc" 0 
  2225. 104 90 88 12 65 1342242819 "button" "En papel preimpreso" 0 
  2226. 104 102 107 12 66 1342242819 "button" "Actualizar campos de acci≤n" 0 
  2227. 104 114 67 12 67 1342242819 "button" "Con notas" 0 
  2228. 6 18 62 10 1000 1342308352 "static" "N·mero de copias:" 0 
  2229. 105 4 54 10 1003 1342177280 "static" "" 0 
  2230. 6 4 29 10 1004 1342177280 "static" "Archivo:" 0 
  2231. 6 30 42 20 1005 1342177280 "static" "Grupo de pßginas:" 0 
  2232. 6 68 212 62 33 1342177287 "button" "Otras opciones" 0 
  2233. 16 58 32 10 1006 1342177280 "static" "Pßginas:" 0 
  2234. 172 6 44 14 1 1342373889 "button" "Aceptar" 0 
  2235. 172 22 44 14 2 1342373888 "button" "Cancelar" 0 
  2236. 172 38 44 14 56 1342373888 "button" "Guardar ->" 0 
  2237. 00022620
  2238.